home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1995 April / Internet Tools.iso / applic / ntp / depredated / ntp.3.4 / patches / patch7.Z / patch7
Encoding:
Text File  |  1991-09-29  |  23.7 KB  |  886 lines
  1. System: ntp version 3.4
  2. Patch #: 7
  3. Priority: 
  4. From:
  5. Description:
  6. Add definition of NOSWAP for Ultrix systems.
  7. Removed unused variables from ntp.c program.
  8. Removed unused variable from ntp_adjust.c module.
  9. Don't clear peer.reach register in the clear() procedure.  Code to prevent
  10. flapping between two peers with very similar dispersions.
  11. Deleted unused variables in ntp_sock.c
  12. Added NOSWAP code for Ultrix systems to lock NTP process in memory.  Deleted
  13. unused variable in ntpd.c
  14. In stat.pl, handle ntpd log files that cross months.
  15. Add check for SUN_FLT_BUG problem in test.c
  16.  
  17. Repeat-By:
  18.  
  19. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your ntp source
  20.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  21.     If you don't have the patch program, apply the following by hand,
  22.     or get patch (version 2.0, latest patchlevel).
  23.  
  24.     After patching:
  25.         make depend
  26.         make
  27.         make install
  28.  
  29.     If patch indicates that patchlevel is the wrong version, you may need
  30.     to apply one or more previous patches, or the patch may already
  31.     have been applied.  See the patchlevel.h file to find out what has or
  32.     has not been applied.  In any event, don't continue with the patch.
  33.  
  34.     If you are missing previous patches they can be obtained from me:
  35.  
  36.     Louis A. Mamakos
  37.     louie@trantor.umd.edu
  38.  
  39.     You can also get the patches via anonymous FTP from
  40.     trantor.umd.edu.
  41.  
  42. Index: patchlevel.h
  43. Prereq: 6
  44. 1c1
  45. < #define PATCHLEVEL 6
  46. ---
  47. > #define PATCHLEVEL 7
  48.  
  49. Index: Makefile
  50. *** Makefile.old    Fri Apr  7 19:10:46 1989
  51. --- Makefile    Fri Apr  7 19:10:47 1989
  52. ***************
  53. *** 1,6 ****
  54. ! # $Source: /usr/users/louie/ntp/RCS/Makefile,v $ $Revision: 3.4.1.3 $ $Date: 89/03/29 12:21:27 $
  55.   #
  56.   # $Log:    Makefile,v $
  57.   # Revision 3.4.1.3  89/03/29  12:21:27  louie
  58.   # Don't bother to create the Version file for the distribution any longer.
  59.   # Define SUN_FLT_BUG rather than just 'sun' to get the a fix for a floating
  60. --- 1,9 ----
  61. ! # $Source: /usr/users/louie/ntp/RCS/Makefile,v $ $Revision: 3.4.1.4 $ $Date: 89/04/07 18:04:14 $
  62.   #
  63.   # $Log:    Makefile,v $
  64. + # Revision 3.4.1.4  89/04/07  18:04:14  louie
  65. + # Add definition of NOSWAP for Ultrix systems.
  66. + # 
  67.   # Revision 3.4.1.3  89/03/29  12:21:27  louie
  68.   # Don't bother to create the Version file for the distribution any longer.
  69.   # Define SUN_FLT_BUG rather than just 'sun' to get the a fix for a floating
  70. ***************
  71. *** 71,76 ****
  72. --- 74,80 ----
  73.   #    LOG_NTP=foo - to change the syslog facility.  You could specify
  74.   #            something like -DLOG_NTP=LOG_LOCAL3 to log into the
  75.   #            LOG_LOCAL3 syslog facility
  76. + #    NOSWAP - allow use of plock() to prevent swapping
  77.   #
  78.   
  79.   # FEATURES=
  80. ***************
  81. *** 87,93 ****
  82.   # it should be declared as a u_long not a in_addr  (the doc is wrong also)
  83.   # (Note 3.0 has it fixed).  VAX_COMPILER_FLT_BUG is defined for pcc which
  84.   # doesn't know how to convert an unsigned long into a float/double
  85. ! #DEFINES= -DVAX_COMPILER_FLT_BUG
  86.   
  87.   CFLAGS= -O ${DEFINES} ${FEATURES} ${INCPATH}
  88.   #
  89. --- 91,97 ----
  90.   # it should be declared as a u_long not a in_addr  (the doc is wrong also)
  91.   # (Note 3.0 has it fixed).  VAX_COMPILER_FLT_BUG is defined for pcc which
  92.   # doesn't know how to convert an unsigned long into a float/double
  93. ! #DEFINES= -DVAX_COMPILER_FLT_BUG -DNOSWAP
  94.   
  95.   CFLAGS= -O ${DEFINES} ${FEATURES} ${INCPATH}
  96.   #
  97.  
  98. Index: ntp.c
  99. *** ntp.c.old    Fri Apr  7 19:10:51 1989
  100. --- ntp.c    Fri Apr  7 19:10:53 1989
  101. ***************
  102. *** 1,9 ****
  103.   #ifndef    lint
  104. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntp.c,v $ $Revision: 3.4.1.3 $ $Date: 89/03/22 18:29:22 $";
  105.   #endif    lint
  106.   
  107.   /*
  108.    *  $Log:    ntp.c,v $
  109.    * Revision 3.4.1.3  89/03/22  18:29:22  louie
  110.    * patch3: Use new RCS headers.
  111.    * 
  112. --- 1,12 ----
  113.   #ifndef    lint
  114. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntp.c,v $ $Revision: 3.4.1.4 $ $Date: 89/04/07 18:04:49 $";
  115.   #endif    lint
  116.   
  117.   /*
  118.    *  $Log:    ntp.c,v $
  119. +  * Revision 3.4.1.4  89/04/07  18:04:49  louie
  120. +  * Removed unused variables from ntp.c program.
  121. +  * 
  122.    * Revision 3.4.1.3  89/03/22  18:29:22  louie
  123.    * patch3: Use new RCS headers.
  124.    * 
  125. ***************
  126. *** 123,133 ****
  127.       struct l_fixedpt in_timestamp;
  128.       static struct ntpdata ntp_data;
  129.       struct ntpdata *pkt = &ntp_data;
  130. !     struct timeval tp, tp1, timeout;
  131.       int host, n, retry, s;
  132.       fd_set readfds;
  133.       int dstlen = sizeof(dst);
  134. !     double ref, t1, t2, t3, t4, offset, delay;
  135.       char ref_clock[5];
  136.       time_t net_time;
  137.       ref_clock[4] = NULL;
  138. --- 126,136 ----
  139.       struct l_fixedpt in_timestamp;
  140.       static struct ntpdata ntp_data;
  141.       struct ntpdata *pkt = &ntp_data;
  142. !     struct timeval tp, timeout;
  143.       int host, n, retry, s;
  144.       fd_set readfds;
  145.       int dstlen = sizeof(dst);
  146. !     double t1, t2, t3, t4, offset, delay;
  147.       char ref_clock[5];
  148.       time_t net_time;
  149.       ref_clock[4] = NULL;
  150. ***************
  151. *** 327,333 ****
  152.   
  153.           /* set the clock */
  154.           gettimeofday(&tp, (struct timezone *) 0);
  155. -         tp1 = tp;
  156.           offset += tp.tv_sec;
  157.           offset += tp.tv_usec / 1000000.0;
  158.           tp.tv_sec = offset;
  159. --- 330,335 ----
  160.  
  161. Index: ntp_adjust.c
  162. *** ntp_adjust.c.old    Fri Apr  7 19:10:57 1989
  163. --- ntp_adjust.c    Fri Apr  7 19:10:58 1989
  164. ***************
  165. *** 1,5 ****
  166.   #ifndef lint
  167. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/ntp_adjust.c,v $ $Revision: 3.4.1.2 $ $Date: 89/03/22 18:30:52 $";
  168.   #endif
  169.   
  170.   /*
  171. --- 1,5 ----
  172.   #ifndef lint
  173. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/ntp_adjust.c,v $ $Revision: 3.4.1.3 $ $Date: 89/04/07 18:05:17 $";
  174.   #endif
  175.   
  176.   /*
  177. ***************
  178. *** 7,12 ****
  179. --- 7,15 ----
  180.    * 5. of the NTP specification.
  181.    *
  182.    * $Log:    ntp_adjust.c,v $
  183. +  * Revision 3.4.1.3  89/04/07  18:05:17  louie
  184. +  * Removed unused variable from ntp_adjust.c module.
  185. +  * 
  186.    * Revision 3.4.1.2  89/03/22  18:30:52  louie
  187.    * patch3: Use new RCS headers.
  188.    * 
  189. ***************
  190. *** 130,136 ****
  191.       double offset;
  192.   {
  193.       struct timeval tv2;
  194. -     int i;
  195.   #ifdef    XADJTIME2
  196.       struct timeval delta, olddelta;
  197.   #endif
  198. --- 133,138 ----
  199.  
  200. Index: ntp_proto.c
  201. *** ntp_proto.c.old    Fri Apr  7 19:11:05 1989
  202. --- ntp_proto.c    Fri Apr  7 19:11:07 1989
  203. ***************
  204. *** 1,5 ****
  205.   #ifndef    lint
  206. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntp_proto.c,v $ $Revision: 3.4.1.5 $ $Date: 89/03/31 16:36:38 $";
  207.   #endif
  208.   
  209.   /*
  210. --- 1,5 ----
  211.   #ifndef    lint
  212. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntp_proto.c,v $ $Revision: 3.4.1.6 $ $Date: 89/04/07 19:07:10 $";
  213.   #endif
  214.   
  215.   /*
  216. ***************
  217. *** 7,15 ****
  218.    * It contains a minimum of machine and operating system dependencies (or at
  219.    * least that's the idea).  Setup of UDP sockets, timers, etc is done in the
  220.    * ntpd.c module, while arithmetic conversion routines are in ntpsubs.c
  221. !  *
  222. !  *
  223.    * $Log:    ntp_proto.c,v $
  224.    * Revision 3.4.1.5  89/03/31  16:36:38  louie
  225.    * There is now a run-time option that can be specified in the configuration 
  226.    * which specifies if we will synchronize to unconfigured hosts.  Fixes to
  227. --- 7,20 ----
  228.    * It contains a minimum of machine and operating system dependencies (or at
  229.    * least that's the idea).  Setup of UDP sockets, timers, etc is done in the
  230.    * ntpd.c module, while arithmetic conversion routines are in ntpsubs.c
  231. !  */
  232. ! 
  233. ! /*
  234.    * $Log:    ntp_proto.c,v $
  235. +  * Revision 3.4.1.6  89/04/07  19:07:10  louie
  236. +  * Don't clear peer.reach register in the clear() procedure.  Code to prevent
  237. +  * flapping between two peers with very similar dispersions.
  238. +  * 
  239.    * Revision 3.4.1.5  89/03/31  16:36:38  louie
  240.    * There is now a run-time option that can be specified in the configuration 
  241.    * which specifies if we will synchronize to unconfigured hosts.  Fixes to
  242. ***************
  243. *** 306,311 ****
  244. --- 311,317 ----
  245.           peer->src = *dst;
  246.           peer->sock = sock;
  247.           peer->hmode = MODE_SYM_PAS;
  248. +         peer->reach = 0;
  249.           clear(peer);
  250.       } else
  251.           peer = check_peer(dst, sock);
  252. ***************
  253. *** 321,328 ****
  254.           peer->sock = sock;    /* remember which socket we heard 
  255.                          this from */
  256.           peer->hmode = MODE_SYM_PAS;
  257.           clear(peer);
  258. - #if    1
  259.           /*
  260.            *  If we decide to consider any random NTP peer that might
  261.            *  come as a peer we might sync to, then set the PEER_FL_SYNC
  262. --- 327,334 ----
  263.           peer->sock = sock;    /* remember which socket we heard 
  264.                          this from */
  265.           peer->hmode = MODE_SYM_PAS;
  266. +         peer->reach = 0;
  267.           clear(peer);
  268.           /*
  269.            *  If we decide to consider any random NTP peer that might
  270.            *  come as a peer we might sync to, then set the PEER_FL_SYNC
  271. ***************
  272. *** 333,339 ****
  273.            */
  274.           if (trusting)
  275.               peer->flags |= PEER_FL_SYNC;
  276. - #endif
  277.   
  278.           enqueue(&peer_list, peer);
  279.       }
  280. --- 339,344 ----
  281. ***************
  282. *** 654,660 ****
  283.       for (i = 0; i < NTP_WINDOW; i++)
  284.           peer->filter.offset[i] = 0.0;
  285.       peer->filter.samples = 0;    /* Implementation specific */
  286. -     peer->reach = 0;
  287.       peer->valid = 0;
  288.       peer->org.int_part = peer->org.fraction = 0;
  289.       peer->rec.int_part = peer->rec.fraction = 0;
  290. --- 659,664 ----
  291. ***************
  292. *** 995,1000 ****
  293. --- 999,1031 ----
  294.                      ntoa(sel_lst[0].peer->src.sin_addr),
  295.                      sel_lst[0].peer->stratum);
  296.       }
  297. + 
  298. +     if (sys.peer != NULL && sys.peer != sel_lst[0].peer) {
  299. +         /* 
  300. +          * Potential peer is different that current one; don't switch
  301. +          * to new peer unless the offset is suitably "large".
  302. +          */
  303. +         if (sys.peer->stratum == sel_lst[0].peer->stratum) {
  304. +             double threshold ;
  305. + 
  306. +             threshold = NTP_MAXSKW +
  307. +                 1.0/(unsigned long)(1L << -sys.precision);
  308. + 
  309. +             /* make sure we don't try to divide by zero */
  310. +             if (-sel_lst[0].peer->precision < sizeof(long))
  311. +                 threshold += 1.0/(unsigned long)
  312. +                     (1L << -sel_lst[0].peer->precision);
  313. + 
  314. +             if (sel_lst[0].peer->estoffset < threshold) {
  315. + #ifdef    DEBUG
  316. +                 if (debug > 2)
  317. +                     printf("clock: inhibit peer switch\n");
  318. + #endif
  319. +                 return;
  320. +             }
  321. +         }         
  322. +     }
  323. + 
  324.   #ifdef    DEBUG
  325.       if ((debug > 2) || (sys.peer != sel_lst[0].peer))
  326.           printf("clock: select peer %s stratum %d\n",
  327.  
  328. Index: ntp_sock.c
  329. *** ntp_sock.c.old    Fri Apr  7 19:11:12 1989
  330. --- ntp_sock.c    Fri Apr  7 19:11:13 1989
  331. ***************
  332. *** 1,9 ****
  333.   #ifndef    lint
  334. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/ntp_sock.c,v $ $Revision: 3.4.1.1 $ $Date: 89/03/22 18:31:20 $";
  335.   #endif
  336.   
  337.   /*
  338.    * $Log:    ntp_sock.c,v $
  339.    * Revision 3.4.1.1  89/03/22  18:31:20  louie
  340.    * patch3: Use new RCS headers.
  341.    * 
  342. --- 1,12 ----
  343.   #ifndef    lint
  344. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/ntp_sock.c,v $ $Revision: 3.4.1.2 $ $Date: 89/04/07 19:07:46 $";
  345.   #endif
  346.   
  347.   /*
  348.    * $Log:    ntp_sock.c,v $
  349. +  * Revision 3.4.1.2  89/04/07  19:07:46  louie
  350. +  * Deleted unused variables in ntp_sock.c
  351. +  * 
  352.    * Revision 3.4.1.1  89/03/22  18:31:20  louie
  353.    * patch3: Use new RCS headers.
  354.    * 
  355. ***************
  356. *** 148,154 ****
  357.       struct    ifreq    ifreq, *ifr;
  358.       int on = 1, off = 0;
  359.       int n, i, vs;
  360. -     struct sockaddr_in sock;
  361.       extern char *malloc();
  362.   
  363.       /*
  364. --- 151,156 ----
  365. ***************
  366. *** 162,171 ****
  367.   
  368.       nintf = 1;
  369.   
  370. -     sock.sin_family = AF_INET;
  371. -     sock.sin_port = port;
  372. -     sock.sin_addr.s_addr = INADDR_ANY;
  373. - 
  374.       if ((vs = socket(AF_INET, SOCK_DGRAM, 0)) < 0) {
  375.           syslog(LOG_ERR, "vs=socket(AF_INET, SOCK_DGRAM) %m");
  376.   #ifdef    TEST
  377. --- 164,169 ----
  378. ***************
  379. *** 317,322 ****
  380. --- 315,321 ----
  381.            *  is being bound anyway..
  382.            */
  383.           if (setsockopt(addrs[i].fd, SOL_SOCKET, SO_REUSEADDR,
  384. + 
  385.                      (char *)&off, sizeof(off))) {
  386.               syslog(LOG_ERR, "setsockopt SO_REUSEADDR off fails: %m");
  387.   #ifdef    TEST
  388.  
  389. Index: ntpd.c
  390. *** ntpd.c.old    Fri Apr  7 19:11:20 1989
  391. --- ntpd.c    Fri Apr  7 19:11:23 1989
  392. ***************
  393. *** 1,9 ****
  394.   #ifndef    lint
  395. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntpd.c,v $ $Revision: 3.4.1.5 $ $Date: 89/03/31 16:37:49 $";
  396.   #endif    lint
  397.   
  398.   /*
  399.    *  $Log:    ntpd.c,v $
  400.    * Revision 3.4.1.5  89/03/31  16:37:49  louie
  401.    * Add support for "trusting" directive in NTP configuration file.  It allows 
  402.    * you to specify at run time if non-configured peers will be synced to.
  403. --- 1,13 ----
  404.   #ifndef    lint
  405. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntpd.c,v $ $Revision: 3.4.1.6 $ $Date: 89/04/07 19:09:04 $";
  406.   #endif    lint
  407.   
  408.   /*
  409.    *  $Log:    ntpd.c,v $
  410. +  * Revision 3.4.1.6  89/04/07  19:09:04  louie
  411. +  * Added NOSWAP code for Ultrix systems to lock NTP process in memory.  Deleted
  412. +  * unused variable in ntpd.c
  413. +  * 
  414.    * Revision 3.4.1.5  89/03/31  16:37:49  louie
  415.    * Add support for "trusting" directive in NTP configuration file.  It allows 
  416.    * you to specify at run time if non-configured peers will be synced to.
  417. ***************
  418. *** 73,78 ****
  419. --- 77,85 ----
  420.   #include <sys/ioctl.h>
  421.   #include <sys/resource.h>
  422.   #include <sys/file.h>
  423. + #ifdef NOSWAP
  424. + #include <sys/lock.h>
  425. + #endif
  426.   
  427.   #include <net/if.h>
  428.   
  429. ***************
  430. *** 115,120 ****
  431. --- 122,131 ----
  432.   int    dotickadj = 0;
  433.   #endif
  434.   
  435. + #ifdef    NOSWAP
  436. + int    noswap = 0;
  437. + #endif
  438. + 
  439.   int doset = 1;
  440.   int ticked;
  441.   int selfds;
  442. ***************
  443. *** 130,136 ****
  444.   extern char *malloc(), *ntoa();
  445.   extern double s_fixed_to_double(), ul_fixed_to_double();
  446.   
  447. ! void finish(), timeout(), tock(), make_new_peer(), init_ntp(), 
  448.       init_kern_vars(), hourly();
  449.   extern void transmit(), process_packet(), clock_update(),
  450.       clear(), clock_filter(), select_clock();
  451. --- 141,147 ----
  452.   extern char *malloc(), *ntoa();
  453.   extern double s_fixed_to_double(), ul_fixed_to_double();
  454.   
  455. ! void finish(), timeout(), tock(), make_new_peer(), init_ntp(), initialize(),
  456.       init_kern_vars(), hourly();
  457.   extern void transmit(), process_packet(), clock_update(),
  458.       clear(), clock_filter(), select_clock();
  459. ***************
  460. *** 157,163 ****
  461.                      then allow others to override default
  462.                      values */
  463.       prog_name = argv[0];
  464. !     while ((cc = getopt(argc, argv, "a:c:dD:st")) != EOF) {
  465.           switch (cc) {
  466.           case 'a':
  467.               if (strcmp(optarg, "any") == 0)
  468. --- 168,174 ----
  469.                      then allow others to override default
  470.                      values */
  471.       prog_name = argv[0];
  472. !     while ((cc = getopt(argc, argv, "a:c:dD:stn")) != EOF) {
  473.           switch (cc) {
  474.           case 'a':
  475.               if (strcmp(optarg, "any") == 0)
  476. ***************
  477. *** 197,202 ****
  478. --- 208,222 ----
  479.   #endif
  480.               break;
  481.   
  482. +         case 'n':
  483. + #ifdef    NOSWAP
  484. +             noswap = 1;
  485. + #else
  486. +             fprintf(stderr, "%s: not compiled for noswap\n",
  487. +                 prog_name);
  488. + #endif
  489. +             break;
  490. + 
  491.           case 'c':
  492.               conf = optarg;
  493.               break;
  494. ***************
  495. *** 247,262 ****
  496.           setlogmask(LOG_UPTO(LOG_INFO));
  497.   #endif    /* LOG_DAEMON */
  498.   
  499. !     syslog(LOG_NOTICE, "%s version $Revision: 3.4.1.5 $", prog_name);
  500.       syslog(LOG_NOTICE, "patchlevel %d", PATCHLEVEL);
  501.   
  502.   #ifdef    DEBUG
  503.       if (debug)
  504. !         printf("%s version $Revision: 3.4.1.5 $ patchlevel %d\n",
  505.                  prog_name, PATCHLEVEL);
  506.   #endif
  507.       (void) setpriority(PRIO_PROCESS, 0, -10);
  508.   
  509.       servp = getservbyname("ntp", "udp");
  510.       if (servp == NULL) {
  511.           syslog(LOG_CRIT, "udp/ntp: service unknown, using default %d",
  512. --- 267,293 ----
  513.           setlogmask(LOG_UPTO(LOG_INFO));
  514.   #endif    /* LOG_DAEMON */
  515.   
  516. !     syslog(LOG_NOTICE, "%s version $Revision: 3.4.1.6 $", prog_name);
  517.       syslog(LOG_NOTICE, "patchlevel %d", PATCHLEVEL);
  518.   
  519.   #ifdef    DEBUG
  520.       if (debug)
  521. !         printf("%s version $Revision: 3.4.1.6 $ patchlevel %d\n",
  522.                  prog_name, PATCHLEVEL);
  523.   #endif
  524.       (void) setpriority(PRIO_PROCESS, 0, -10);
  525.   
  526. + #ifdef    NOSWAP
  527. +     if (noswap)
  528. +         if (plock(PROCLOCK) != 0)  {
  529. +             syslog(LOG_ERR, "plock() failed: %m");
  530. + #ifdef    DEBUG
  531. +             if (debug)
  532. +                 perror("plock() failed");
  533. + #endif
  534. +         }
  535. + #endif
  536. + 
  537.       servp = getservbyname("ntp", "udp");
  538.       if (servp == NULL) {
  539.           syslog(LOG_CRIT, "udp/ntp: service unknown, using default %d",
  540. ***************
  541. *** 737,742 ****
  542. --- 768,777 ----
  543.                   error = TRUE;
  544.               else tickadj = i;
  545.   #endif
  546. + #ifdef    NOSWAP
  547. +         } else if (strcmp(name, "noswap") == 0) {
  548. +             noswap = 1;
  549. + #endif
  550.   #ifdef    BROADCAST_NTP
  551.           } else if (strcmp(name, "broadcast") == 0) {
  552.               if (fscanf(fp, "%s", name) != 1) {
  553. ***************
  554. *** 855,861 ****
  555.                   }
  556.               }
  557.               skipit:;
  558. !         }        /* end else ntppeer */
  559.           do
  560.               c = fgetc(fp);
  561.           while (c != '\n' && c != EOF);    /* next line */
  562. --- 890,902 ----
  563.                   }
  564.               }
  565.               skipit:;
  566. !         } else if( *name != '#' ) {
  567. !             syslog(LOG_ERR, "config file: %s not recognized", name);
  568. ! #ifdef DEBUG
  569. !             if(debug)
  570. !                 printf("unrecognized option in config file: %s\n", name);
  571. ! #endif
  572. !         }
  573.           do
  574.               c = fgetc(fp);
  575.           while (c != '\n' && c != EOF);    /* next line */
  576. ***************
  577. *** 1117,1123 ****
  578.   /* every hour, dump some useful information to the log */
  579.   void
  580.   hourly() {
  581. -     register struct ntp_peer *peer = peer_list.head;
  582.       char buf[200];
  583.       register int p = 0;
  584.       extern double drift_comp, compliance;
  585. --- 1158,1163 ----
  586.  
  587. Index: stat.pl
  588. *** stat.pl.old    Fri Apr  7 19:11:28 1989
  589. --- stat.pl    Fri Apr  7 19:11:29 1989
  590. ***************
  591. *** 1,5 ****
  592.   #!/usr/bin/perl  
  593. ! # $Source: /usr/users/louie/ntp/RCS/stat.pl,v $ $Revision: 3.4.1.4 $ $Date: 89/03/31 16:38:42 $
  594.   #
  595.   #  Make plots from ntpd syslog messages.  Invoked as:
  596.   #
  597. --- 1,5 ----
  598.   #!/usr/bin/perl  
  599. ! # $Source: /usr/users/louie/ntp/RCS/stat.pl,v $ $Revision: 3.4.1.5 $ $Date: 89/04/07 19:10:00 $
  600.   #
  601.   #  Make plots from ntpd syslog messages.  Invoked as:
  602.   #
  603. ***************
  604. *** 29,36 ****
  605.   #    off -0.015756 drft 0.000000 cmpl 0.000000
  606.   # Mar 10 08:56:19 trantor ntpd[27755]: clock: select peer 128.8.10.1 stratum 1
  607.   #    was 130.126.174.40 stratum 1
  608.   #
  609. - #
  610.   $scriptfile = $0;
  611.   
  612.   $month{'Jan'} = 0; $month{'Feb'} = 1; $month{'Mar'} = 2; $month{'Apr'} = 3;
  613. --- 29,37 ----
  614.   #    off -0.015756 drft 0.000000 cmpl 0.000000
  615.   # Mar 10 08:56:19 trantor ntpd[27755]: clock: select peer 128.8.10.1 stratum 1
  616.   #    was 130.126.174.40 stratum 1
  617. + # Mar 31 16:55:19 trantor ntpd[2195]: /usr/local/etc/ntpd version $Revision:
  618. + #    3.4.1.5 $#
  619.   #
  620.   $scriptfile = $0;
  621.   
  622.   $month{'Jan'} = 0; $month{'Feb'} = 1; $month{'Mar'} = 2; $month{'Apr'} = 3;
  623. ***************
  624. *** 37,42 ****
  625. --- 38,61 ----
  626.   $month{'May'} = 4; $month{'Jun'} = 5; $month{'Jul'} = 6; $month{'Aug'} = 7;
  627.   $month{'Sep'} = 8; $month{'Oct'} = 9; $month{'Nov'} = 10; $month{'Dec'} = 11;
  628.   
  629. + #
  630. + #  Currently, the year is not included in the syslog messages.  We'll have to
  631. + #  assume that the log files be processed were written this year.
  632. + #
  633. + ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
  634. + 
  635. + if ($year % 4) {
  636. +     # not leap year
  637. +     $days[0] = 0; $days[1] = 31; $days[2] = 59; $days[3] = 90;
  638. +     $days[4] = 120; $days[5] = 151; $days[6] = 181; $days[7] = 212;
  639. +     $days[8] = 243; $days[9] = 273; $days[10] = 304; $days[11] = 334; 
  640. + } else {
  641. +     # leap year
  642. +     $days[0] = 0; $days[1] = 31; $days[2] = 60; $days[3] = 91;
  643. +     $days[4] = 121; $days[5] = 152; $days[6] = 182; $days[7] = 213;
  644. +     $days[8] = 244; $days[9] = 274; $days[10] = 305; $days[11] = 335;
  645. + }
  646. + 
  647.   die "Can't open drift compansation file\n" unless open(DRIFT, ">stats.drift");
  648.   die "Can't open offset file\n" unless open(OFF, ">stats.off");
  649.   die "Can't open compliance file\n" unless open(COMP, ">stats.comp");
  650. ***************
  651. *** 66,78 ****
  652.   }
  653.   
  654.   while (<>) {
  655. !     if (/.* ntpd\[[0-9]*\]: *.ntpd version/) {
  656.           chop;
  657.           @in = split;
  658.           $recs++;
  659.   
  660.           @time = split(/:/,$in[2]);
  661. !         $t = $in[1]*24 + $time[0] + $time[1]/60 + $time[2]/3600;
  662.   
  663.           if (!$start) {
  664.               $start = $t;
  665. --- 85,101 ----
  666.   }
  667.   
  668.   while (<>) {
  669. !     if (/.* ntpd\[[0-9]*\]: (.*\/ntpd) version \$Revision: \b(.*)\b/) {
  670.           chop;
  671.           @in = split;
  672.           $recs++;
  673. +         $revision = $1 . " " . $2;
  674.   
  675. +         print "Revision $revision\n";
  676. + 
  677.           @time = split(/:/,$in[2]);
  678. !         $t = $in[1]*24 + $time[0] + $time[1]/60 + $time[2]/3600 +
  679. !             $days[$month{$in[0]}]*24;
  680.   
  681.           if (!$start) {
  682.               $start = $t;
  683. ***************
  684. *** 83,89 ****
  685.           chop;
  686.           @in = split;
  687.           @time = split(/:/,$in[2]);
  688. !         $t = $in[1]*24 + $time[0] + $time[1]/60 + $time[2]/3600;
  689.   
  690.           if (!$start) {
  691.               $start = $t;
  692. --- 106,113 ----
  693.           chop;
  694.           @in = split;
  695.           @time = split(/:/,$in[2]);
  696. !         $t = $in[1]*24 + $time[0] + $time[1]/60 + $time[2]/3600 +
  697. !             $days[$month{$in[0]}]*24;
  698.   
  699.           if (!$start) {
  700.               $start = $t;
  701. ***************
  702. *** 103,110 ****
  703.           $recs++;
  704.   
  705.           @time = split(/:/,$in[2]);
  706. !         $t = $in[1]*24 + $time[0] + $time[1]/60 + $time[2]/3600;
  707. ! 
  708.           if (!$start) {
  709.               $start = $t;
  710.               printf "Start time is %s %s %s\n",$in[0],$in[1],$in[2];
  711. --- 127,134 ----
  712.           $recs++;
  713.   
  714.           @time = split(/:/,$in[2]);
  715. !         $t = $in[1]*24 + $time[0] + $time[1]/60 + $time[2]/3600 +
  716. !             $days[$month{$in[0]}]*24;
  717.           if (!$start) {
  718.               $start = $t;
  719.               printf "Start time is %s %s %s\n",$in[0],$in[1],$in[2];
  720.  
  721. Index: test.c
  722. *** test.c.old    Fri Apr  7 19:11:33 1989
  723. --- test.c    Fri Apr  7 19:11:33 1989
  724. ***************
  725. *** 1,9 ****
  726.   #ifndef    lint
  727. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/test.c,v $ $Revision: 3.4.1.2 $ $Date: 89/03/31 16:39:19 $";
  728.   #endif
  729.   
  730.   /*
  731.    * $Log:    test.c,v $
  732.    * Revision 3.4.1.2  89/03/31  16:39:19  louie
  733.    * Bug fix for VAX_COMPILER_FLT_BUG test, start of test for Sun problem.
  734.    * 
  735. --- 1,12 ----
  736.   #ifndef    lint
  737. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/test.c,v $ $Revision: 3.4.1.3 $ $Date: 89/04/07 19:10:41 $";
  738.   #endif
  739.   
  740.   /*
  741.    * $Log:    test.c,v $
  742. +  * Revision 3.4.1.3  89/04/07  19:10:41  louie
  743. +  * Add check for SUN_FLT_BUG problem in test.c
  744. +  * 
  745.    * Revision 3.4.1.2  89/03/31  16:39:19  louie
  746.    * Bug fix for VAX_COMPILER_FLT_BUG test, start of test for Sun problem.
  747.    * 
  748. ***************
  749. *** 57,65 ****
  750.   
  751.   #define    TRUE    1
  752.   #define    FALSE    0
  753. - #define    BSD_43
  754.   
  755. ! int test1(), test2(), test3();
  756.   
  757.   double value[8] = {5.1, -5.1, 1.5, -1.5, 0.5, -0.5, -0.05, 0.0};
  758.   main(argc, argv)
  759. --- 60,67 ----
  760.   
  761.   #define    TRUE    1
  762.   #define    FALSE    0
  763.   
  764. ! int test1(), test2(), test3(), test4();
  765.   
  766.   double value[8] = {5.1, -5.1, 1.5, -1.5, 0.5, -0.5, -0.05, 0.0};
  767.   main(argc, argv)
  768. ***************
  769. *** 67,80 ****
  770.       char **argv;
  771.   {
  772.       if (argc > 1 && strcmp(argv[1], "-v") == 0) {
  773. !         if (test1(1))
  774. !             exit(1);
  775. !         if (test2(1))
  776. !             exit(2);
  777. !         if (test3(1))
  778. !             exit(3);
  779. !         if (test4(1))
  780. !             exit(4);
  781.       } else {
  782.           if (test3(0))
  783.               exit(3);
  784. --- 69,78 ----
  785.       char **argv;
  786.   {
  787.       if (argc > 1 && strcmp(argv[1], "-v") == 0) {
  788. !         exit(test1(1)
  789. !              + test2(1)
  790. !              + test3(1)
  791. !              + test4(1));
  792.       } else {
  793.           if (test3(0))
  794.               exit(3);
  795. ***************
  796. *** 92,98 ****
  797.       struct l_fixedpt sample;
  798.       double s_fixed_to_double();
  799.       struct s_fixedpt s_sample;
  800. -     double x;
  801.   
  802.       for (i = 0; i < 8; i++) {
  803.           printf(" %4.2f ", value[i]);
  804. --- 90,95 ----
  805. ***************
  806. *** 126,132 ****
  807.   test3(v)
  808.       int v;
  809.   {
  810. !     unsigned long ul = 0x80000000;
  811.       double dbl;
  812.   
  813.       dbl = ul;
  814. --- 123,129 ----
  815.   test3(v)
  816.       int v;
  817.   {
  818. !     unsigned long ul = 0x80000001;
  819.       double dbl;
  820.   
  821.       dbl = ul;
  822. ***************
  823. *** 133,141 ****
  824.   #ifdef    VAX_COMPILER_FLT_BUG
  825.       if (dbl < 0.0) dbl += 4.294967296e9;
  826.   #endif
  827. !     if (dbl != 2147483648.0) {
  828.           printf("test3 fails: can't convert from unsigned long to float\n");
  829. !         printf("             (%lu != %f)\n", ul, dbl);
  830.           printf("Try defining VAX_COMPILER_FLT_BUG in the Makefile.\n");
  831.           return 1;
  832.       } else {
  833. --- 130,138 ----
  834.   #ifdef    VAX_COMPILER_FLT_BUG
  835.       if (dbl < 0.0) dbl += 4.294967296e9;
  836.   #endif
  837. !     if (dbl != 2147483649.0) {
  838.           printf("test3 fails: can't convert from unsigned long to float\n");
  839. !         printf("             (%lu != %15g)\n", ul, dbl);
  840.           printf("Try defining VAX_COMPILER_FLT_BUG in the Makefile.\n");
  841.           return 1;
  842.       } else {
  843. ***************
  844. *** 148,163 ****
  845.   test4(v)
  846.       int v;
  847.   {
  848. !     /* 
  849. !      * Need a test for the SUN 2^31 - 2^32 problem (in ntpsubs.c).  Anyone
  850. !      * with a Sun out there that can come up with one?
  851. !      *
  852. !      */
  853. !     if (0) {
  854.           printf("test4 fails:\n");
  855.           printf("Try defining SUN_FLT_BUG in the Makefile\n");
  856.           return 1;
  857.       }
  858. -     return 0;
  859.   }
  860. - 
  861. --- 145,168 ----
  862.   test4(v)
  863.       int v;
  864.   {
  865. !     double dbl = 1024.0 * 1024.0 * 1024.0;    /* 2^30 */
  866. ! #ifdef SUN_FLT_BUG
  867. !     int l = 1.5 * dbl;
  868. !     u_long ul = (l<<1);
  869. ! #else
  870. !     u_long ul = 3.0 * dbl;            /* between 2^31 and 2^32 */
  871. ! #endif
  872. !     if (v)
  873. !         printf("test4: 3.0*1024.0*1024.0*1024.0 = 0x%08x\n", ul);
  874. ! 
  875. !     if (ul != 0xc0000000) {
  876.           printf("test4 fails:\n");
  877. +         printf("Can't convert unsigned long to double.\n");
  878.           printf("Try defining SUN_FLT_BUG in the Makefile\n");
  879.           return 1;
  880. +     } else {
  881. +         if (v)
  882. +             printf("test4 passes\n");
  883. +             return 0;
  884.       }
  885.   }
  886.